inherited fmMailServis: TfmMailServis
  Left = 333
  Top = 159
  Caption = 'Mail & Sms Servisi'
  ClientHeight = 362
  ClientWidth = 664
  PixelsPerInch = 96
  TextHeight = 13
  object PageControl1: TPageControl [0]
    Left = 0
    Top = 0
    Width = 664
    Height = 321
    ActivePage = TabSheet5
    Align = alClient
    TabOrder = 0
    object TabSheet5: TTabSheet
      Caption = 'Mail Servis'
      ImageIndex = 4
      object GroupBox3: TGroupBox
        Left = 0
        Top = 0
        Width = 656
        Height = 293
        Align = alClient
        Caption = '  Genel Servis  '
        TabOrder = 0
        object Label2: TLabel
          Left = 8
          Top = 27
          Width = 22
          Height = 13
          Caption = 'Host'
        end
        object Label1: TLabel
          Left = 8
          Top = 50
          Width = 19
          Height = 13
          Caption = 'Mail'
        end
        object Label3: TLabel
          Left = 8
          Top = 73
          Width = 39
          Height = 13
          Caption = 'Kullan'#305'c'#305
        end
        object Label4: TLabel
          Left = 8
          Top = 96
          Width = 21
          Height = 13
          Caption = #350'ifre'
        end
        object Label5: TLabel
          Left = 8
          Top = 119
          Width = 19
          Height = 13
          Caption = 'Port'
        end
        object edServer: TwwDBEdit
          Left = 56
          Top = 24
          Width = 241
          Height = 21
          DataField = 'Host'
          DataSource = dm.dsMailServis
          TabOrder = 0
          UnboundDataType = wwDefault
          WantReturns = False
          WordWrap = False
        end
        object wwDBEdit1: TwwDBEdit
          Left = 56
          Top = 47
          Width = 241
          Height = 21
          DataField = 'infoMail'
          DataSource = dm.dsMailServis
          TabOrder = 1
          UnboundDataType = wwDefault
          WantReturns = False
          WordWrap = False
        end
        object wwDBEdit2: TwwDBEdit
          Left = 56
          Top = 70
          Width = 241
          Height = 21
          DataField = 'Username'
          DataSource = dm.dsMailServis
          TabOrder = 2
          UnboundDataType = wwDefault
          WantReturns = False
          WordWrap = False
        end
        object wwDBEdit3: TwwDBEdit
          Left = 56
          Top = 93
          Width = 241
          Height = 21
          DataField = 'Password'
          DataSource = dm.dsMailServis
          PasswordChar = '*'
          TabOrder = 3
          UnboundDataType = wwDefault
          WantReturns = False
          WordWrap = False
        end
        object wwDBEdit4: TwwDBEdit
          Left = 56
          Top = 116
          Width = 76
          Height = 21
          DataField = 'Port'
          DataSource = dm.dsMailServis
          TabOrder = 4
          UnboundDataType = wwDefault
          WantReturns = False
          WordWrap = False
        end
      end
    end
    object TabSheet1: TTabSheet
      Caption = 'Kay'#305'p && '#199'al'#305'nt'#305' Ayarlar'#305
      TabVisible = False
      object GroupBox1: TGroupBox
        Left = 0
        Top = 0
        Width = 656
        Height = 293
        Align = alClient
        Caption = '  Kay'#305'p '#199'al'#305'nt'#305' Durumunda Mail At'#305'lacaklar Listesi  '
        TabOrder = 0
        object grdKayip: TwwDBGrid
          Left = 2
          Top = 15
          Width = 652
          Height = 276
          DisableThemes = False
          ControlType.Strings = (
            'MailRef;CustomEdit;LCMail;T')
          Selected.Strings = (
            'MailRef'#9'50'#9'Mail'#9'F')
          IniAttributes.Delimiter = ';;'
          TitleColor = clBtnFace
          FixedCols = 0
          ShowHorzScrollBar = True
          Align = alClient
          DataSource = dsKayip
          KeyOptions = [dgEnterToTab, dgAllowDelete, dgAllowInsert]
          TabOrder = 0
          TitleAlignment = taLeftJustify
          TitleFont.Charset = DEFAULT_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -11
          TitleFont.Name = 'MS Sans Serif'
          TitleFont.Style = []
          TitleLines = 1
          TitleButtons = False
          UseTFields = False
          PaintOptions.AlternatingRowColor = 16310998
          PaintOptions.ActiveRecordColor = 15183770
        end
        object LCMail: TwwDBLookupCombo
          Left = 16
          Top = 64
          Width = 304
          Height = 21
          DisableThemes = False
          DropDownAlignment = taLeftJustify
          Selected.Strings = (
            'Mail'#9'30'#9'Mail'#9'F')
          LookupTable = dm.MailList
          LookupField = 'Ref'
          Navigator = False
          TabOrder = 1
          AutoDropDown = True
          ShowButton = True
          UseTFields = False
          AllowClearKey = True
          ShowMatchText = True
        end
      end
    end
    object TabSheet2: TTabSheet
      Caption = 'Giri'#351' Yap'#305'lacak '#220'r'#252'nler'
      ImageIndex = 2
      TabVisible = False
      object grdGirisYap: TwwDBGrid
        Left = 0
        Top = 0
        Width = 656
        Height = 293
        DisableThemes = False
        ControlType.Strings = (
          'MailRef;CustomEdit;lcMailGirisYap;T')
        Selected.Strings = (
          'MailRef'#9'50'#9'Mail'#9'F')
        IniAttributes.Delimiter = ';;'
        TitleColor = clBtnFace
        FixedCols = 0
        ShowHorzScrollBar = True
        Align = alClient
        DataSource = dsGirisYap
        KeyOptions = [dgEnterToTab, dgAllowDelete, dgAllowInsert]
        TabOrder = 0
        TitleAlignment = taLeftJustify
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        TitleLines = 1
        TitleButtons = False
        UseTFields = False
        PaintOptions.AlternatingRowColor = 16310998
        PaintOptions.ActiveRecordColor = 15183770
      end
      object lcMailGirisYap: TwwDBLookupCombo
        Left = 16
        Top = 64
        Width = 304
        Height = 21
        DisableThemes = False
        DropDownAlignment = taLeftJustify
        Selected.Strings = (
          'Mail'#9'30'#9'Mail'#9'F')
        LookupTable = dm.MailList
        LookupField = 'Ref'
        Navigator = False
        TabOrder = 1
        AutoDropDown = True
        ShowButton = True
        UseTFields = False
        AllowClearKey = True
        ShowMatchText = True
      end
    end
    object TabSheet3: TTabSheet
      Caption = 'Sms Servis'
      ImageIndex = 3
      object cxGrid1: TcxGrid
        Left = 0
        Top = 144
        Width = 656
        Height = 149
        Align = alClient
        TabOrder = 0
        object grdSms: TcxGridDBTableView
          NavigatorButtons.ConfirmDelete = False
          DataController.DataSource = dsSmsServis
          DataController.Summary.DefaultGroupSummaryItems = <>
          DataController.Summary.FooterSummaryItems = <>
          DataController.Summary.SummaryGroups = <>
          OptionsData.Deleting = False
          OptionsData.DeletingConfirmation = False
          OptionsData.Editing = False
          OptionsData.Inserting = False
          OptionsView.GroupByBox = False
          object grdSmsKeyID: TcxGridDBColumn
            DataBinding.FieldName = 'KeyID'
          end
          object grdSmsTip: TcxGridDBColumn
            DataBinding.FieldName = 'Tip'
            PropertiesClassName = 'TcxImageComboBoxProperties'
            Properties.Items = <
              item
                Description = 'Tamamland'#305' Mesaj'#305
                ImageIndex = 0
                Value = 1
              end
              item
                Description = #220'cretli '#304#351'lem Mesaj'#305
                Value = 2
              end
              item
                Description = #214'deme Bilgileri'
                Value = 3
              end>
          end
          object grdSmsBaslik: TcxGridDBColumn
            Caption = 'Ba'#351'l'#305'k'
            DataBinding.FieldName = 'Baslik'
            Width = 104
          end
          object grdSmsMesaj: TcxGridDBColumn
            DataBinding.FieldName = 'Mesaj'
            Width = 159
          end
          object grdSmsUstFirmaKodu: TcxGridDBColumn
            Caption = 'Firma Kodu'
            DataBinding.FieldName = 'UstFirmaId'
            PropertiesClassName = 'TcxLookupComboBoxProperties'
            Properties.KeyFieldNames = 'carikod'
            Properties.ListColumns = <
              item
                FieldName = 'carikodu'
              end>
            Properties.ListSource = dsCariList
            Width = 76
          end
          object grdSmsUstFirmaId: TcxGridDBColumn
            Caption = 'Firma'
            DataBinding.FieldName = 'UstFirmaId'
            PropertiesClassName = 'TcxLookupComboBoxProperties'
            Properties.KeyFieldNames = 'carikod'
            Properties.ListColumns = <
              item
                FieldName = 'FirmaAdi'
              end>
            Properties.ListSource = dsCariList
            Width = 173
          end
          object grdSmsGelisi: TcxGridDBColumn
            Caption = 'Geli'#351'i'
            DataBinding.FieldName = 'Gelisi'
            PropertiesClassName = 'TcxImageComboBoxProperties'
            Properties.Items = <
              item
                Description = 'Elden'
                ImageIndex = 0
                Value = 'E'
              end
              item
                Description = 'Kargo'
                Value = 'K'
              end
              item
                Description = 'Ranger Sevkiyat'
                Value = 'R'
              end>
          end
        end
        object cxGrid1Level1: TcxGridLevel
          GridView = grdSms
        end
      end
      object cxGroupBox1: TcxGroupBox
        Left = 0
        Top = 0
        Align = alTop
        TabOrder = 1
        DesignSize = (
          656
          144)
        Height = 144
        Width = 656
        object Label8: TLabel
          Left = 9
          Top = 64
          Width = 28
          Height = 13
          Caption = 'Mesaj'
        end
        object lRecord: TLabel
          Left = 9
          Top = 78
          Width = 3
          Height = 13
        end
        object Label6: TLabel
          Left = 9
          Top = 19
          Width = 15
          Height = 13
          Caption = 'Tip'
        end
        object Label7: TLabel
          Left = 9
          Top = 41
          Width = 28
          Height = 13
          Caption = 'Ba'#351'l'#305'k'
        end
        object Label11: TLabel
          Left = 430
          Top = 19
          Width = 72
          Height = 13
          Anchors = [akTop, akRight]
          Caption = #220'st Firma Kodu'
        end
        object Label12: TLabel
          Left = 430
          Top = 41
          Width = 25
          Height = 13
          Anchors = [akTop, akRight]
          Caption = 'Geli'#351'i'
        end
        object edtMesaj: TcxDBMemo
          Left = 73
          Top = 60
          Anchors = [akLeft, akTop, akRight]
          DataBinding.DataField = 'Mesaj'
          DataBinding.DataSource = dsSmsServis
          Properties.OnChange = edtMesajPropertiesChange
          TabOrder = 0
          Height = 36
          Width = 581
        end
        object edtTip: TcxDBImageComboBox
          Left = 73
          Top = 16
          DataBinding.DataField = 'Tip'
          DataBinding.DataSource = dsSmsServis
          Properties.Items = <
            item
              Description = 'Tamamland'#305' Mesaj'#305
              ImageIndex = 0
              Value = 1
            end
            item
              Description = #220'cretli '#304#351'lem Mesaj'#305
              Value = 2
            end
            item
              Description = #214'deme Bilgileri'
              Value = 3
            end>
          TabOrder = 1
          Width = 138
        end
        object edtBaslik: TcxDBTextEdit
          Left = 73
          Top = 38
          DataBinding.DataField = 'Baslik'
          DataBinding.DataSource = dsSmsServis
          TabOrder = 2
          Width = 190
        end
        object edtGelisi: TcxDBImageComboBox
          Left = 510
          Top = 38
          Anchors = [akTop, akRight]
          DataBinding.DataField = 'Gelisi'
          DataBinding.DataSource = dsSmsServis
          Properties.ImmediatePost = True
          Properties.Items = <
            item
              Description = 'Elden'
              ImageIndex = 0
              Value = 'E'
            end
            item
              Description = 'Kargo'
              Value = 'K'
            end
            item
              Description = 'Ranger Servkiyat'
              Value = 'R'
            end>
          TabOrder = 3
          Width = 145
        end
        object edtUstFirma: TcxDBLookupComboBox
          Left = 510
          Top = 16
          Anchors = [akTop, akRight]
          DataBinding.DataField = 'UstFirmaId'
          DataBinding.DataSource = dsSmsServis
          Properties.DropDownAutoSize = True
          Properties.ImmediatePost = True
          Properties.KeyFieldNames = 'carikod'
          Properties.ListColumns = <
            item
              Width = 100
              FieldName = 'carikodu'
            end
            item
              Width = 200
              FieldName = 'FirmaAdi'
            end>
          Properties.ListSource = dsCariList
          TabOrder = 4
          Width = 145
        end
        object btEkle: TBitBtn
          Left = 414
          Top = 111
          Width = 75
          Height = 25
          Anchors = [akTop, akRight]
          Caption = 'Ekle'
          TabOrder = 5
          OnClick = btEkleClick
        end
        object btDegistir: TBitBtn
          Left = 493
          Top = 111
          Width = 75
          Height = 25
          Anchors = [akTop, akRight]
          Caption = 'Vazge'#231
          TabOrder = 6
          OnClick = btDegistirClick
        end
        object btSil: TBitBtn
          Left = 572
          Top = 111
          Width = 75
          Height = 25
          Anchors = [akTop, akRight]
          Caption = 'Sil'
          TabOrder = 7
          OnClick = btSilClick
        end
      end
    end
    object TabSheet4: TTabSheet
      Caption = 'Toplu Sms G'#246'nderme'
      ImageIndex = 4
      DesignSize = (
        656
        293)
      object Label13: TLabel
        Left = 8
        Top = 60
        Width = 28
        Height = 13
        Caption = 'Ba'#351'l'#305'k'
      end
      object Label14: TLabel
        Left = 8
        Top = 83
        Width = 28
        Height = 13
        Caption = 'Mesaj'
      end
      object Label17: TLabel
        Left = 232
        Top = 121
        Width = 196
        Height = 16
        Caption = 'T'#252'rk'#231'e Karakter Kullanmay'#305'n'#305'z'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clRed
        Font.Height = -13
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Label18: TLabel
        Left = 8
        Top = 10
        Width = 47
        Height = 13
        Caption = 'Telefonlar'
      end
      object Label19: TLabel
        Left = 232
        Top = 140
        Width = 142
        Height = 16
        Caption = 'Telefon : 5XX,5XX,5XX'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clRed
        Font.Height = -13
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object tMesaj: TcxMemo
        Left = 72
        Top = 79
        Anchors = [akLeft, akTop, akRight]
        Properties.MaxLength = 160
        Properties.OnChange = edtMesajPropertiesChange
        TabOrder = 0
        Height = 36
        Width = 581
      end
      object tTelefon: TcxMemo
        Left = 72
        Top = 6
        Anchors = [akLeft, akTop, akRight]
        Properties.OnChange = edtMesajPropertiesChange
        TabOrder = 1
        Height = 50
        Width = 581
      end
      object btSmsGonder: TBitBtn
        Left = 83
        Top = 120
        Width = 111
        Height = 40
        Caption = 'Sms G'#246'nder'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clRed
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 2
        OnClick = btSmsGonderClick
      end
      object tBaslik: TcxDBTextEdit
        Left = 72
        Top = 57
        DataBinding.DataField = 'Baslik'
        DataBinding.DataSource = dsSmsServis
        Properties.ReadOnly = True
        Style.Color = clInfoBk
        TabOrder = 3
        Width = 190
      end
    end
    object TabSheet6: TTabSheet
      Caption = 'Sms Parametre'
      ImageIndex = 5
      object cxGrid2: TcxGrid
        Left = 0
        Top = 0
        Width = 656
        Height = 293
        Align = alClient
        TabOrder = 0
        object grdSmsParam: TcxGridDBTableView
          NavigatorButtons.ConfirmDelete = False
          DataController.DataSource = dsSmsParam
          DataController.Summary.DefaultGroupSummaryItems = <>
          DataController.Summary.FooterSummaryItems = <>
          DataController.Summary.SummaryGroups = <>
          OptionsData.Appending = True
          OptionsView.GroupByBox = False
          object grdSmsParamKeyID: TcxGridDBColumn
            DataBinding.FieldName = 'KeyID'
            Width = 54
          end
          object grdSmsParamUrl: TcxGridDBColumn
            DataBinding.FieldName = 'Url'
            Width = 336
          end
          object grdSmsParamKullanici: TcxGridDBColumn
            Caption = 'Kullan'#305'c'#305
            DataBinding.FieldName = 'Kullanici'
            Width = 81
          end
          object grdSmsParamSifre: TcxGridDBColumn
            DataBinding.FieldName = 'Sifre'
            PropertiesClassName = 'TcxTextEditProperties'
            Properties.EchoMode = eemPassword
            Width = 91
          end
          object grdSmsParamTelefonBas: TcxGridDBColumn
            DataBinding.FieldName = 'TelefonBas'
          end
        end
        object cxGridLevel1: TcxGridLevel
          GridView = grdSmsParam
        end
      end
    end
  end
  object Panel1: TPanel [1]
    Left = 0
    Top = 321
    Width = 664
    Height = 41
    Align = alBottom
    TabOrder = 1
    DesignSize = (
      664
      41)
    object btKaydet: TBitBtn
      Left = 552
      Top = 3
      Width = 101
      Height = 34
      Anchors = [akTop, akRight]
      Caption = 'Kaydet'
      TabOrder = 0
      OnClick = btKaydetClick
    end
  end
  inherited alKeyControl: TActionList
    Left = 351
    Top = 202
  end
  inherited XPManifest: TXPManifest
    Left = 417
    Top = 199
  end
  object aqKayip: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    BeforePost = aqKayipBeforePost
    CommandTimeout = 300
    Parameters = <>
    SQL.Strings = (
      'Select * From tblMailAtilacaklar Where Tip=1')
    Left = 252
    Top = 103
  end
  object dsKayip: TDataSource
    DataSet = aqKayip
    Left = 251
    Top = 160
  end
  object aqGirisYap: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    BeforePost = aqGirisYapBeforePost
    CommandTimeout = 300
    Parameters = <>
    SQL.Strings = (
      'Select * From tblMailAtilacaklar Where Tip=4')
    Left = 387
    Top = 108
  end
  object dsGirisYap: TDataSource
    DataSet = aqGirisYap
    Left = 386
    Top = 165
  end
  object aqSmsServis: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    CommandTimeout = 300
    Parameters = <>
    SQL.Strings = (
      'Select * From SmsParam')
    Left = 132
    Top = 171
  end
  object dsSmsServis: TDataSource
    DataSet = aqSmsServis
    Left = 133
    Top = 230
  end
  object aqCariList: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    BeforePost = aqKayipBeforePost
    CommandTimeout = 300
    Parameters = <>
    SQL.Strings = (
      'SELECT carikod, UnityCariKod,carikodu,FirmaAdi'
      'FROM Cari'
      'WHERE Aktif='#39'A'#39' and (CariKod>0) '
      'and (isnull(Tipi,0) in (30))'
      'ORDER BY FirmaAdi')
    Left = 205
    Top = 199
  end
  object dsCariList: TDataSource
    DataSet = aqCariList
    Left = 204
    Top = 257
  end
  object aqSmsParam: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    CommandTimeout = 300
    Parameters = <>
    SQL.Strings = (
      'Select * From SmsServis')
    Left = 543
    Top = 97
  end
  object dsSmsParam: TDataSource
    DataSet = aqSmsParam
    Left = 544
    Top = 156
  end
end
